home *** CD-ROM | disk | FTP | other *** search
/ Directorty Opus 5 - Magellan / Opus 5 - Magellan.iso / Extras / playcdda_norsk / Install next >
Text File  |  1995-11-22  |  2KB  |  64 lines
  1. ; $VER: Install PlayCDDA for Opus5 Norsk
  2. ; Script to install the Norsk catalog translation for Players Opus 5.11.
  3.  
  4. ;=============================================================================
  5. ; check if Directory Opus 5 is already installed
  6.  
  7. (if (not (exists "DOpus5:DirectoryOpus" (noreq)))
  8.     (abort "Directory Opus 5 must be installed first.")
  9. )
  10.  
  11. (set @default-dest "Dopus5:")
  12.  
  13. ;=============================================================================
  14. ; install catalogs
  15.  
  16. (copyfiles
  17.    (prompt "Copy cataloges ...")
  18.    (help @copyfiles-help)
  19.    (source "Catalogs/norsk")
  20.    (dest "SYS:Locale/Catalogs/norsk")
  21.    (confirm "EXPERT")
  22.    (optional "force")
  23.    (pattern "#?")
  24.    (files)
  25. )
  26.  
  27. ;=============================================================================
  28. ; install Norsk version of buttons banks
  29. (set ButtonCopyPrompt   "Copy buttons ...")
  30.  
  31. (copyfiles
  32.    (prompt ButtonCopyPrompt)
  33.    (help @copyfiles-help)
  34.    (source "buttons")
  35.    (dest "DOpus5:buttons")
  36.    (confirm "EXPERT")
  37.    (optional "force")
  38.    (pattern "#?")
  39.    (files)
  40. )
  41.  
  42. ;=============================================================================
  43. ; make Norsk user menu the default
  44.  
  45. (if
  46.    (askbool
  47.       (prompt "Norsk versions of the user menus is available.\n\n"
  48.               "Do you wish to install this and rename the old one as\n"
  49.               "'user menu_old'."
  50.       )
  51.       (help "Installs the Norsk version of the default user menu ")
  52.    )
  53.    (
  54.       (rename "DOpus5:Buttons/user menu" "DOpus5:Buttons/user menu_old")
  55.       (copyfiles
  56.          (source "DOpus5:Buttons/user menu_norsk")
  57.          (dest "DOpus5:Buttons")
  58.          (newname "user menu")
  59.       )
  60.    )
  61. )
  62.  
  63. (exit)
  64.